home *** CD-ROM | disk | FTP | other *** search
- /*
- ** $VER: TMLG 1.1 (13.10.2000)
- ** © 2000 by Jacob Laursen <laursen@myself.com>
- **
- ** Set up your player path below and some of these events in Amster:
- **
- ** Download finished
- ** Double-clicking library file
- ** Double-clicking download file
- ** MP3 player
- **
- ** Command: RexxC:RX Apps:Comm/Amster/Rexx/TMLG.rexx PLAY "%f"
- **
- */
-
- PlayerPath = 'Apps:Sound/Players/TMLG/TheMpegaLibraryGui'
-
- /* No user-serviceable parts below */
-
- parse arg mode' 'filename
- options results
-
- if ~show('P','TMLG.1') then address command 'Run <>NIL: 'PlayerPath
-
- do while ~show('P','TMLG.1')
- call delay(50)
- end
-
- address 'TMLG.1'
-
- if upper(mode) = 'PLAY' then 'PLAY NAME 'filename
-